home *** CD-ROM | disk | FTP | other *** search
/ Magnum One / Magnum One (Mid-American Digital) (Disc Manufacturing).iso / d7 / jlblink.arc / LOGONTYM.BMC < prev    next >
Encoding:
Text File  |  1990-10-18  |  1.3 KB  |  65 lines
  1. ** LOGONTYM.BMC -- LOGON.BMC
  2. ** 
  3. ** This script is used to setup your modem, dial the modem, log
  4. ** onto BIX, and wait till BIX is a its Main System Prompt.  It
  5. ** performs no other functions.
  6. ** 
  7. Echo "On"
  8. Screen "On"
  9. Show "Setting Up Modem . . .\n"
  10. Puts "ATZ\r"
  11. Wait "2"
  12.  
  13. Watch_Start
  14.  
  15.      Show "Dialing Number\n"
  16.      Puts "AT DT@BIX's PHONE@\r"
  17.  
  18.      Watch_00 "CONNECT"
  19.           Show "\nConnected to Tymnet.\n"
  20.           Watch_Del_00
  21.           Wait "6"
  22.           Puts "a"
  23.  
  24.      Watch_01 "CARRIER"
  25.           Return
  26.  
  27.      Watch_02 "log in:"
  28.           Puts "@ACCESS ID@\b\r"
  29.           Echo "OFF"
  30.  
  31.      Watch_03 "Name?"
  32.           Puts "@USER ID@\n"
  33.  
  34.      Watch_04 "Password:"
  35.           Screen "Off"
  36.           Puts "@PASSWORD@\n"
  37.           Screen "On"
  38.           Show "*****************\n"
  39.  
  40.      Watch_05 "Last on:"
  41.           Gets "\n"
  42.           Puts "Echo Ready\n"
  43.  
  44.      Watch_06 ".More.."
  45.           Puts "\rEcho Ready\r"
  46.  
  47.      Watch_07 "option or ? for help:"
  48.           Puts "8\r"
  49.           Getc ":"
  50.           Puts "Echo Ready\r"
  51.  
  52.      Watch_08 "Ready"
  53.           Watch_Del_01
  54.           Watch_Del_02
  55.           Watch_Del_03
  56.           Watch_Del_04
  57.           Watch_Del_05
  58.           Watch_Del_06
  59.           Watch_Del_07
  60.           Watch_Del_08
  61.           Show "\nJLBlink welcomes you, @USER ID@, to BIX!\n"
  62.  
  63. Watch_End
  64.  
  65.